object frBarCodeForm: TfrBarCodeForm Left = 196 Top = 110 BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp] BorderStyle = bsDialog Caption = 'Barcode editor' ClientHeight = 249 ClientWidth = 269 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter ShowHint = True OnActivate = FormActivate OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 8 Top = 8 Width = 25 Height = 13 Caption = 'Code' end object Label2: TLabel Left = 8 Top = 52 Width = 54 Height = 13 Caption = 'Type of bar' end object Image1: TImage Left = 11 Top = 217 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Visible = False end object bCancel: TButton Left = 188 Top = 219 Width = 75 Height = 25 HelpContext = 50 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object bOk: TButton Left = 108 Top = 219 Width = 75 Height = 25 HelpContext = 40 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 2 OnClick = bOkClick end object M1: TfrComboEdit Left = 8 Top = 24 Width = 253 Height = 21 HelpContext = 260 Style = csSimple ItemHeight = 13 TabOrder = 0 Text = '0' Glyph.Data = { D6000000424DD60000000000000076000000280000000C0000000C0000000100 0400000000006000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00707777777777 0000770777777777000077087007007700007780778007770000778087700077 0000777087007807000077780777777700007700000777770000777708777777 0000777700780777000077777000777700007777777777770000} OnButtonClick = ExprBtnClick end object cbType: TComboBox Left = 8 Top = 68 Width = 253 Height = 21 HelpContext = 261 Style = csDropDownList ItemHeight = 13 TabOrder = 1 end object GroupBox1: TGroupBox Left = 8 Top = 100 Width = 253 Height = 61 Caption = 'Options' TabOrder = 4 object Label3: TLabel Left = 136 Top = 18 Width = 45 Height = 13 Alignment = taRightJustify AutoSize = False Caption = 'Zoom:' FocusControl = eZoom end object ckCheckSum: TCheckBox Left = 8 Top = 16 Width = 129 Height = 17 HelpContext = 262 Caption = 'Checksum ' TabOrder = 0 end object ckViewText: TCheckBox Left = 8 Top = 36 Width = 121 Height = 17 HelpContext = 263 Caption = 'Human readable' TabOrder = 1 end object eZoom: TEdit Left = 192 Top = 16 Width = 49 Height = 21 HelpContext = 149 TabOrder = 2 Text = '1' end object Panel1: TPanel Left = 222 Top = 18 Width = 17 Height = 17 BevelOuter = bvNone TabOrder = 3 object frSpeedButton1: TfrSpeedButton Left = 0 Top = 0 Width = 17 Height = 8 Glyph.Data = { 86000000424D8600000000000000760000002800000007000000040000000100 0400000000001000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFF0F000 00F0FF000FF0FFF0FFF0} Spacing = 0 OnClick = frSpeedButton1Click end object frSpeedButton2: TfrSpeedButton Left = 0 Top = 9 Width = 17 Height = 8 Glyph.Data = { 86000000424D8600000000000000760000002800000007000000040000000100 0400000000001000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFF0FFF0FF00 0FF0F00000F0FFFFFFF0} OnClick = frSpeedButton2Click end end end object GroupBox2: TGroupBox Left = 8 Top = 168 Width = 253 Height = 41 Caption = 'Orientation' TabOrder = 5 object RB1: TRadioButton Left = 8 Top = 16 Width = 37 Height = 17 HelpContext = 264 Caption = '0' Checked = True TabOrder = 0 TabStop = True end object RB2: TRadioButton Left = 72 Top = 16 Width = 37 Height = 17 HelpContext = 264 Caption = '90' TabOrder = 1 end object RB3: TRadioButton Left = 136 Top = 16 Width = 45 Height = 17 HelpContext = 264 Caption = '180' TabOrder = 2 end object RB4: TRadioButton Left = 200 Top = 16 Width = 45 Height = 17 HelpContext = 264 Caption = '270' TabOrder = 3 end end end